home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / 422mods.zip / TANIS003.422 < prev    next >
Text File  |  1993-03-07  |  7KB  |  167 lines
  1. Tanis003.mod, supreme chainlister mod with gold! Blinking!!!
  2. Pull #783 @17310
  3. Wednesday, March 3, 1993  11:22 pm
  4. ┌────────────────────────────────────────────────────────────────────────────┐
  5. │ Mod Name:    :  TANIS003.MOD        Author :  Tanis Half-Elven 1@17315     │
  6. │ Difficulty   :  Easy                Date   :  2/26/93                      │
  7. │ Files Modded :  BBSUTL1.C           WWIV Version :  4.22 (Any Really)      │
  8. │ Description  :  A two colum chain lister. Also a Fix to the one chain prob.│
  9. └────────────────────────────────────────────────────────────────────────────┘
  10.   Well i got the idea for this mod one day while playing some online game. I 
  11. dont know quite where it came from, it just poped in there. Anyway, the mod
  12. will display the chains in two colums. The first void has the call for gold.
  13. But if you dont have gold/dont want gold, then the second void is for you. Oh
  14. in the first void the gold will flash red if it is zero, kinda a freebee 
  15. alert for the leechs. 
  16.   The second part of this mod is just to delete some stuff to keep WWIV from  
  17. automaticly running a chain, if ther is only 1. I hate pressing '.' and it 
  18. running a chain with out consulting me! This came from a mod Galen made.
  19.  
  20. -*-*-*A Special thanx to Galen Pathwarden. Most of this add on code is *-*-*-
  21. -*-*-*his making, and he also is a big help!                           *-*-*-
  22.  
  23. Step 1: Back up your source, because i am not responsible for anything that
  24.      happens to you or your computer.
  25.  
  26. Step 2: Load BBSUTL1.C
  27.  
  28. Step 3: Search fo : void show_chains(int *mapp, int *map) 
  29.  
  30. Step 4: Delete all of void show_chains(int *mapp, int *map) 
  31.  
  32. Step 5: Put in part a if you have gold, otherwise put in part b.
  33.  
  34. /* Part A */
  35. void show_chains(int *mapp, int *map)
  36. {
  37.   int abort,i,i1;
  38.   char s[181],s1[181],ch1d[10],ch2d[10];
  39.  
  40.   if (okansi()) {
  41.   abort=0;
  42.   nl();
  43.   pla("7╔═════════════════════════════════════════════════════════════════════════════╗",&abort);
  44.   pla("7║                           1Your BBS Name here!!!                             7║",&abort);
  45.   pla("7╠═══╦══════╦═══════════════════════════╦═══╦══════╦═══════════════════════════╣",&abort);
  46.   pla("7║ 3# 7║ 2Gold 7║ 1Programs                  7║ 3# 7║ 2Gold 7║ 1Programs                  7║",&abort);
  47.   pla("7╠═══╬══════╬═══════════════════════════╬═══╬══════╬═══════════════════════════╣",&abort);
  48.   for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
  49.   if (costgold[map[i]]==0)
  50.       sprintf(ch1d,"6%-3d",costgold[map[i]]);
  51.   else sprintf(ch1d,"2%-3d",costgold[map[i]]);
  52.  
  53.   sprintf(s, "7║3%2d 7║  %s 7║ 1%-25.25s ",
  54.                  i+1,ch1d,(chains[map[i]].description));
  55.   i++;
  56.   if (costgold[map[i]]==0)
  57.       sprintf(ch2d,"6%-3d",costgold[map[i]]);
  58.   else sprintf(ch2d,"2%-3d",costgold[map[i]]);
  59.   sprintf(s1,"7║3%2d 7║  %s 7║ 1%-25.25s 7║",
  60.                  i+1,ch2d,chains[map[i]].description);
  61.   strcat(s,s1);
  62.   pla(s,&abort);
  63.   }
  64.   pla("7╚═══╩══════╩═══════════════════════════╩═══╩══════╩═══════════════════════════╝",&abort);
  65. } else {
  66.   abort=0;
  67.   nl();
  68.   pla("+-----------------------------------------------------------------------------+",&abort);
  69.   pla("|                           Your BBS Name here!!!                             |",&abort);
  70.   pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  71.   pla("| # | Gold | Programs                  | # | Gold | Programs                  |",&abort);
  72.   pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  73.   for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
  74.   if (costgold[map[i]]==0)
  75.       sprintf(ch1d,"6%-3d",costgold[map[i]]);
  76.   else sprintf(ch1d,"%-3d",costgold[map[i]]);
  77.  
  78.   sprintf(s, "|%2d |  %s 0| %-25.25s ",
  79.                  i+1,ch1d,(chains[map[i]].description));
  80.   i++;
  81.   if (costgold[map[i]]==0)
  82.       sprintf(ch2d,"6%-3d",costgold[map[i]]);
  83.   else sprintf(ch2d,"%-3d",costgold[map[i]]);
  84.   sprintf(s1,"|%2d |  %s 0| %-25.25s |",
  85.                  i+1,ch2d,chains[map[i]].description);
  86.   strcat(s,s1);
  87.   pla(s,&abort);
  88.   }
  89.   pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  90.   }
  91.   nl();
  92. }
  93.  
  94. /* Part B */
  95. void show_chains(int *mapp, int *map)
  96. {
  97.   int abort,i,i1;
  98.   char s[181],s1[181],ch1d[10],ch2d[10];
  99.  
  100.   if (okansi()) {
  101.   abort=0;
  102.   nl();
  103.   pla("7╔═════════════════════════════════════════════════════════════════════════════╗",&abort);
  104.   pla("7║                           1Your BBS Name here!!!                             7║",&abort);
  105.   pla("7╠═══╦══════════════════════════════════╦═══╦══════════════════════════════════╣",&abort);
  106.   pla("7║ 3# 7║ 1Programs                         7║ 3# 7║ 1Programs                         7║",&abort);
  107.   pla("7╠═══╬══════════════════════════════════╬═══╬══════════════════════════════════╣",&abort);
  108.   for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
  109.  
  110.   sprintf(s, "7║3%2d 7║ 1%-32.32s ",
  111.                  i+1,(chains[map[i]].description));
  112.   i++;
  113.   sprintf(s1,"7║3%2d 7║ 1%-32.32s 7║",
  114.                  i+1,ch2d,chains[map[i]].description);
  115.   strcat(s,s1);
  116.   pla(s,&abort);
  117.   }
  118.   pla("7╚═══╩══════════════════════════════════╩═══╩══════════════════════════════════╝",&abort);
  119. } else {
  120.   abort=0;
  121.   nl();
  122.   pla("+-----------------------------------------------------------------------------+",&abort);
  123.   pla("|                           Your BBS Name here!!!                             |",&abort);
  124.   pla("+---+----------------------------------+---+----------------------------------+",&abort);
  125.   pla("| # | Programs                         | # | Programs                         |",&abort);
  126.   pla("+---+----------------------------------+---+----------------------------------+",&abort);
  127.   for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
  128.  
  129.   sprintf(s, "|%2d | %-32.32s ",
  130.                  i+1,(chains[map[i]].description));
  131.   i++;
  132.   if (costgold[map[i]]==0)
  133.       sprintf(ch2d,"6%-3d",costgold[map[i]]);
  134.   else sprintf(ch2d,"%-3d",costgold[map[i]]);
  135.   sprintf(s1,"|%2d | %-32.32s |",
  136.                  i+1,chains[map[i]].description);
  137.   strcat(s,s1);
  138.   pla(s,&abort);
  139.   }
  140.   pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
  141.   }
  142.   nl();
  143. }
  144.  
  145. Part 6: Save BBSUTL1.C
  146.  
  147. Part 7: Go to void do_chains    
  148.  
  149. Part 8: Search for "Sorry, no external programs available."
  150.     Go down to:
  151.   
  152.   if (mapp==1) {
  153.     run_chain(map[0]);
  154.     return;
  155.  
  156. Delete this little block of code.
  157.  
  158. Part 9: Save BBSUTL1.C again, and compile.
  159.  
  160.   That's it. simple huh? Well just watch your 's in the BBS Name, they dont
  161. count as spaces, so dont line up the |'s or ║'s becuase then you will come up
  162. short when WWIV displays the line. If you have any questions, comments or 
  163. problems with this mod, I can be reached at 1@17315 or via the WWIVLink Mod 
  164. Discussion sub. Cya.
  165.                    7Tanis
  166.                    5The Half-Elven
  167.